Top 10k strings from Flecht (19xx)(-)(de).z80 in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [Z80] (TOSEC-v2007-01-01) /
Back to the directory listing
3 A$(XP,YP)=R$(J*3
2 YP=YP+YH*I
2 YM=XH*YL+YH*XL
2 XP=XP+XH*I:
2 XM=XH*XL-YH*YL:
2 G$=A$(XP+XH*I,YP+YH*I)
2 A$(XP,YP)=Q$(2
2 );" PIN ";
2 (HG)*PN+PN
2 "Welche Bautnr ";H:
2 "V: ";(H+1
2 "Liste/Edit (1/2)";n:
2 "3) DRUCKER / 2) SCHIRM ";CH
1 ZO*X1,ZO*Y1:
1 ZO*(X+XP-X1),ZO*(Y+YP-Y1)
1 YP=YY*YH+I*XH+J*YH*DI
1 Y=YH*ST*DZ+XH*HG:
1 XP=XX*XH+I*YH+J*XH*DI:
1 XP*ZO-XX*XH+YY*YH,YP*ZO-YY*XH-XX*YH
1 XL=YP-YY*XH-XX*YH+YM
1 XL=XP-XX*XH+YY*YH+XM
1 X=XH*ST*DZ-YH*HG:
1 VN=XP*YH+YP*XH:
1 V$(L)=V$(HXV)
1 V$(L)=K$(M,1
1 V$(I)=V$(I+1
1 V$(HXV+MXK)=V$(MXV):
1 V$(HXV+MXK)=L$(H1,1
1 V$(HXV)=H$:
1 UB=(XP+XM*J)*
1 T=HXV+MXK:
1 R/CODE
1 R$=R$+Q$(2
1 R$=R$+Q$(1
1 R$=R$+H$(PT+(VN-UB<VN-NA)):
1 R$=R$+H$(PT+(VN-UB
1 R$=R$+" ":
1 Q$=A$(K(H,2
1 L$(MXL)=K$(H2)
1 L$(L)=K$(L)
1 L$(H1)=K$(H2):
1 K$(MXK)=V$(L,HM
1 K$(H2)=L$(H1,1
1 K$(H2)=K$(MXK):
1 G$=K$(PTK,
1 G$=A$(XP+XM*J,YP+YM*J)
1 G$="Zielkoordinate markieren"
1 G$="Geradenstueck markieren"
1 DI=XP*XH+YP*YH-DI
1 DI=XP*XH+YP*YH
1 A$(Y1,X+XP+1
1 A$(XP-I*XH,YP-I*YH)=Q$(1
1 A$(XP,YP)=" ":
1 A$(XP,YP)="
1 A$(XP+XH*I,YP+YH*I)=" ":
1 ;"VERIFY";
1 ;"VERB. LISTE VOLL!":
1 ;"Rechte Teilkette:":
1 ;"MAXIMAL 3 ZEICHEN!":
1 ;"Kein Geradenstueck":
1 ;"FEHLER":
1 ;"BIBLIOTEK VOLL!":
1 ;"BAUT. LISTE VOLL!":
1 ;"A)bbruch
1 ;"9) SICHERN"
1 ;"8) ANZEIGE"
1 ;"7) R0UTEN"
1 ;"6) SORTIEREN"
1 ;"5) RECONNECT"
1 ;"4) PLACEMENT"
1 ;"3) VEBINDUNGSLISTE"
1 ;"2) BAUTEILLISTE"
1 ;"13) EXITUS"
1 ;"12) Zoooom change!"
1 ;"11) AUSDR.VEB.LISTE"
1 ;"10) LADEN"
1 ;"1) BAUTEILBIBLIO."
1 ;" Y=";107
1 ;" NAME DER FILES ";H$
1 ;" NAME DER FILES ";H$
1 ;" (Y/N)";G$
1 : weiter (y/n) ";
1 -(MXB)*(L=MXB):
1 +(MXB)*(L=1
1 )=K$(MXK):
1 );":restore? (y/n) ");
1 );":(Btlnr neu / <ENT>)
1 );" X=";XP/ZO;" Y=";YP/ZO;" D-Alt";H;": D-Neu? ");
1 );" PIN=";
1 );" BAUTEILNAHME/'ENDE' ";H$:
1 );" BAUTEIL VON/'ENDE' ";H$:
1 );" BAUTEIL NACH ";h$:
1 );" DREH=";
1 ))*(H$="8")
1 ))*(H$="7")
1 ))*(H$="6")
1 ))*(H$="5")
1 (XM)+(YP+YM*J)*
1 ((XP)/ZO):
1 ("Btlnr ";
1 ("BAUT. ";H;" ";H$;" ");L
1 #CH;"VON ";b$(
1 #CH;"NACH ";b$(
1 "Zoom: 1/2/<Enter> ";
1 "Welcher Hintergrund sw=0/ws=1 ";f:
1 "WEITER (Y/N)";H$
1 "Verbindung o.k":
1 "V: ";(H);" PINNR. VON ";L:
1 "V: ";(H);" PIN NR. NACH ";L:
1 "Rout N)eu/R)est/A)lternativen";
1 "Linke Teilkette:":
1 "INITBIBLIOTEK (Y/N)?";H$
1 "INIT VERB. LISTE (Y/N)?";H$
1 "INIT BAUT. LISTE (Y/N)?";H$
1 "HG ","PN ","DZ ","XX ","YY ","XL ","YL "
1 "EINTRAEGE EINFUEGEN (y/n)? ";H$:
1 "EINTRAEGE EINFUEGEN (Y/N)? ";H$:
1 "EINTRAEGE EINFUEGEN (Y/N) ";H$
1 "Bibl/B+Verb (1/2)";n
1 "Bibl/B+Bibl (1/2)";n
1 "BATEILTYP-NUMMER? ";L
1 "B)ESTUEKUNGS- S)CHICHSEITE ";
1 "<Enter>";
1 "<ENTER>";
1 "1) BAUT. 2) VERB. 3) BEIDES ";MD
1 / E)ende / <Curser>"
1 "<ENTER>";